home *** CD-ROM | disk | FTP | other *** search
/ Chip: Hang es video / CHIP_ZENESZERKESZTO_2005.ISO / audio_3 / visual / robotfunk / setup.exe / {app} / main.dxr / Internal_197.ls < prev    next >
Encoding:
Text File  |  2003-11-19  |  452 b   |  22 lines
  1. property spriteNum
  2.  
  3. on mouseUp me
  4.   if the doubleClick then
  5.     sprite(spriteNum).member.editable = 1
  6.   end if
  7. end
  8.  
  9. on mouseUpOutSide me
  10.   sprite(spriteNum).member.editable = 0
  11. end
  12.  
  13. on keyUp me
  14.   if the keyCode = 36 then
  15.     sprite(spriteNum).member.editable = 0
  16.     val = max(1, min(128, value(sprite(spriteNum).member.text)))
  17.     sprite(spriteNum).member.text = string(val)
  18.     sprite(467).maxframes = val
  19.     sprite(467).outframe = val
  20.   end if
  21. end
  22.